R-da(R;i)
== case R of 
== Rnone => 
== Rplus(left,right)=>rec1,rec2.rec1  rec2
== Rinit(loc,T,x,v)=> 
== Rframe(loc,T,x,L)=> 
== Rsframe(lnk,tag,L)=> 
== Reffect(loc,ds,knd,T,x,f)=> if loc = i knd : T else  fi
== Rsends(ds,knd,T,l,dt,g)=> if source(l) = i knd : T  lnk-decl(l;dt) else  fi
== Rpre(loc,ds,a,T,P)=> if loc = i locl(a) : T else  fi
== Raframe(loc,k,L)=> 
== Rbframe(loc,k,L)=> 
== Rrframe(loc,x,L)=>  

latex

---

clarification:

R-da(R;i)
== case R of 
== Rnone => 
== Rplus(left,right)=>rec1,rec2.fpf-join(KindDeq;rec1;rec2)
== Rinit(loc,T,x,v)=> 
== Rframe(loc,T,x,L)=> 
== Rsframe(lnk,tag,L)=> 
== Reffect(loc,ds,knd,T,x,f)=> if loc = i knd : T else  fi
== Rsends(ds,knd,T,l,dt,g)=> if source(l) = i fpf-join(KindDeq;knd : T;lnk-decl(l;dt)) else  fi
== Rpre(loc,ds,a,T,P)=> if loc = i locl(a) : T else  fi
== Raframe(loc,k,L)=> 
== Rbframe(loc,k,L)=> 
== Rrframe(loc,x,L)=>  

latex

Definitions	source(l), f  g, KindDeq, lnk-decl(l;dt), if b t else f fi, a = b, x : v, locl(a),
FDL editor aliases	R-da